; ORIGINAL: 3dt2.1/examples/delviews.scm
; $Id: delviews.scm,v 1.3 1996/10/21 15:59:00 aed Exp $
;- delviews.scm ---------------------------------------------------
; Delete all existing views.
;------------------------------------------------------------------
(map view:delete (env:views))
